home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 17 / 017.d81 / game prog-2 (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  293b  |  11 lines
  1. 5 A$= "A"
  2. 10 POKE 56334, PEEK(56334) AND 254
  3. 20 POKE 1, PEEK(1) AND 251
  4. 30 FOR X=12288 TO 12799: POKE X, PEEK(X+40960): NEXT X
  5. 40 POKE 1, PEEK(1) OR 4
  6. 50 POKE 56334, PEEK(56334) OR 1
  7. 60 POKE 53272, (PEEK(53272) AND 240) OR 12
  8. 65 Y= 12288+(ASC(A$)-64)*8
  9. 70 FOR X= Y TO Y+7: READ A: POKE X, A: NEXT X
  10. 90 DATA 255, 129, 129, 129, 129, 129, 129, 255
  11.